home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 00 / 5 / DISK0050.ZIP / ADDCRS.BAS next >
BASIC Source File  |  1982-08-24  |  858b  |  17 lines
  1. 2 INPUT"INPUT THE FILENAME THAT WAS DOWNLOADED WITHOUT CR (d:filename)  ",A$
  2. 4 INPUT"INPUT THE NEW NAME FOR THE DOWNLOADED FILE (d:filename)  ",B$
  3. 5 ' CHANGE THE INPUT AND OUTPUT NAMES TO THE NAMES OF THE FILES YOU WANT AS
  4. 6 ' INPUT AND OUTPUT  PRIMARILY USED TO COPY FILES WITH NO CARRIAGE RETURNS
  5. 7 ' IN THEM SO THAT YOU CAN EDLIN THEM   CONTRIBUTED BY DON WITHROW
  6. 10 OPEN A$ FOR INPUT AS #1
  7. 20 OPEN B$ FOR OUTPUT AS #2
  8. 30 IF EOF(1) THEN 100 ELSE LINE INPUT #1, THELIN$
  9. 40 PRINT #2, THELIN$
  10. 50 GOTO 30
  11. 100 CLOSE:END
  12. 120 'This program will add Carriage Returns to a downloaded file that does
  13. 130 'not appear to have them when you try to list it using the DOS TYPE
  14. 140 'command. The file has to be a basic program, patch or subroutine.
  15. 150 'After adding CRs to the file you can then use EDLIN to remove direct
  16. 160 'statements from the file.
  17.